home *** CD-ROM | disk | FTP | other *** search
- #!/bin/sh
- #
- # Copyright (c) 2007 Dmitry K. Butskoy
- # <buc@citadel.stu.neva.ru>
- # License: GPL v2 or any later
- #
- # See COPYING for the status of this software.
- #
-
- #
- # Shell wrapper providing lft(8) command line interface.
- #
- # The original implementation of lft(8) can be obtained
- # from http://pwhois.org/lft/
- #
-
-
- prgname=$0
- opts=""
- length=""
- method="-T"
-
- dport=""
- sport=""
- queries=2
- ahead=5
- scatter=20
- timeout=1000
-
-
- usage () {
- echo "Usage: $prgname [-ACEFINRSTUVbehinpruvz] [-d dport] [-s sport]
- [-m retry min] [-M retry max] [-a ahead] [-c scatter ms] [-t timeout ms]
- [-l min ttl] [-H max ttl] [-L length] [-q ISN] [-D device] [--help]
- [gateway ...] target:dport" >&2
- }
-
- warning () {
- echo "$prgname: Option '$1' is not implemented in this wrapper" >&2
- }
-
-
- PARSED=`getopt -o 'ACEFINRSTUVbehinpruvzd:s:m:M:a:c:t:l:H:L:q:D:' -l help -- "$@"`
- [ $? != 0 ] && exit 2
-
- eval set -- "$PARSED"
-
- while [ $# -gt 0 ]
- do
- case "$1" in
- -d) dport=$2; shift 2 ;;
- -s) sport=$2; shift 2 ;;
- -z) sport=""; shift ;;
- -m) queries=$2; shift 2 ;;
- -a) ahead=$2; shift 2 ;;
- -c) scatter=$2; shift 2 ;;
- -t) timeout=$2; shift 2 ;;
- -l) opts="$opts -f $2"; shift 2 ;;
- -L) length=$2; shift 2 ;;
- -D) case "$2" in
- [0-9]*) opts="$opts -s $2" ;;
- *) opts="$opts -i $2" ;;
- esac
- shift 2
- ;;
- -H) opts="$opts -m $2"; shift 2 ;;
- -I) opts="$opts -t 0x10"; shift ;;
- -n) opts="$opts -n"; shift ;;
- -h) shift ;;
- -F) opts="$opts -O fin"; shift ;;
- -u) method="-U"; shift ;;
- -N) opts="$opts -A"; shift ;;
- -p) method="-I"; shift ;;
- -b) shift ;;
- -A) opts="$opts -A"; shift ;;
- -[ieErCTUV]) warning $1; shift ;;
- -[Mq]) warning $1; shift 2 ;;
- -[RS]) shift ;;
- --help) usage; exit 0 ;;
- -v) echo "\"lft\"-compatible wrapper for new Linux Traceroute" >&2;
- exit 0 ;;
- --) shift; break ;;
- *) echo "$prgname: Internal parsing error" >&2; exit 2 ;;
- esac
- done
-
- while [ $# -gt 1 ]
- do
- opts="$opts -g $1"
- shift
- done
-
- [ $# -eq 0 ] && {
- usage
- exit 2
- }
-
- case "$1" in
- *:*:*) host=$1 ;;
- *:*) dport=${1##*:}; host=${1%:*} ;;
- *) host=$1 ;;
- esac
-
- [ -n "$dport" ] && opts="$opts -p $dport"
- [ -n "$sport" ] && opts="$opts --sport=$sport"
- opts="$opts -q $queries"
- opts="$opts -N $(($ahead * $queries))"
- opts="$opts -z $scatter"
-
- timeout=`printf "%04d" $timeout`
- sec=${timeout%???}
- opts="$opts -w $sec.${timeout#$sec}"
-
- opts="$method $opts"
-
- exec /usr/bin/traceroute.db $opts $host $length
-
-